object GetUserForm: TGetUserForm
  Left = 0
  Top = 0
  ActiveControl = Grid
  BorderStyle = bsDialog
  Caption = #1042#1099#1073#1086#1088' '#1087#1086#1083#1100#1079#1086#1074#1072#1090#1077#1083#1103
  ClientHeight = 366
  ClientWidth = 332
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsStayOnTop
  KeyPreview = True
  OldCreateOrder = False
  PopupMode = pmAuto
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 325
    Width = 332
    Height = 41
    Align = alBottom
    TabOrder = 0
    object JvXPButton1: TJvXPButton
      Left = 24
      Top = 12
      Width = 120
      Caption = 'Ok'
      TabOrder = 0
      ModalResult = 1
      OnClick = JvXPButton1Click
    end
    object JvXPButton2: TJvXPButton
      Left = 172
      Top = 12
      Width = 120
      Caption = #1054#1090#1084#1077#1085#1080#1090#1100
      TabOrder = 1
      ModalResult = 2
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 288
    Width = 332
    Height = 37
    Align = alBottom
    BevelOuter = bvLowered
    TabOrder = 1
    object Label1: TLabel
      Left = 64
      Top = 12
      Width = 37
      Height = 13
      Caption = #1055#1072#1088#1086#1083#1100
    end
    object Psw: TJvEdit
      Left = 112
      Top = 10
      Width = 121
      Height = 19
      Flat = True
      ParentFlat = False
      PasswordChar = #9679
      TabOrder = 0
      OnKeyDown = PswKeyDown
    end
  end
  object Grid: TDBGridEh
    Left = 0
    Top = 0
    Width = 332
    Height = 288
    Align = alClient
    AutoFitColWidths = True
    DataGrouping.GroupLevels = <>
    DataSource = DataSource
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'Tahoma'
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    RowDetailPanel.Color = clBtnFace
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnKeyDown = GridKeyDown
    Columns = <
      item
        AutoFitColWidth = False
        EditButtons = <>
        FieldName = 'CODE'
        Footers = <>
        Title.Caption = #1050#1086#1076
      end
      item
        EditButtons = <>
        FieldName = 'NAME'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1060'.'#1048'.'#1054
        Width = 238
      end>
    object RowDetailData: TRowDetailPanelControlEh
    end
  end
  object DS: TpFIBDataSet
    SelectSQL.Strings = (
      'SELECT'
      '    CODE,'
      '    NAME,'
      '    LASTTIME,'
      '    BASECODE,'
      '    STATE,'
      '    PROFILES,'
      '    PSW'
      'FROM'
      '    SPR$USERS '
      'WHERE State=1'
      'ORDER BY Name')
    Left = 24
    Top = 36
  end
  object DataSource: TDataSource
    DataSet = DS
    Left = 52
    Top = 36
  end
  object Storage: TJvFormStorage
    AppStorage = AppIni
    AppStoragePath = 'GetUserForm\'
    Options = []
    AfterRestorePlacement = StorageAfterRestorePlacement
    StoredProps.Strings = (
      'Psw.Tag')
    StoredValues = <>
    Left = 44
    Top = 96
  end
  object AppIni: TJvAppIniFileStorage
    StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
    StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
    FileName = 'Forms.ini'
    SubStorages = <>
    Left = 72
    Top = 96
  end
end
